home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •Word Games• / CrossWiseDA •••• / CrossWiseDA.doc / CrossWiseDA.doc.rsrc / CODE_7_PrintStuff.txt < prev    next >
Text File  |  1989-10-02  |  27KB  |  474 lines
  1. # near model CODE resource
  2. # jump table entries: 600-601 (2 of them)
  3. fn00000000:
  4. 00000000  4E56 0000                link       A6, 0
  5. 00000004  48E7 0108                movem.l    -[A7], D7,A4
  6. 00000008  286D F744                movea.l    A4, [A5 - 0x8BC]
  7. 0000000C  2854                     movea.l    A4, [A4]
  8. 0000000E  2B6C 0008 FA8E           move.l     [A5 - 0x572], [A4 + 0x8]
  9. 00000014  2B6C 000C FA92           move.l     [A5 - 0x56E], [A4 + 0xC]
  10. 0000001A  286D FA8A                movea.l    A4, [A5 - 0x576]
  11. 0000001E  2854                     movea.l    A4, [A4]
  12. 00000020  066D 0048 FA8E           addi.w     [A5 - 0x572], 0x48 /* 'H' */
  13. 00000026  066D 003C FA90           addi.w     [A5 - 0x570], 0x3C /* '<' */
  14. 0000002C  046D 003C FA94           subi.w     [A5 - 0x56C], 0x3C /* '<' */
  15. 00000032  3E2D FA92                move.w     D7, [A5 - 0x56E]
  16. 00000036  9E6D FA8E                sub.w      D7, [A5 - 0x572]
  17. 0000003A  0447 0048                subi.w     D7, 0x48 /* 'H' */
  18. 0000003E  48C7                     ext.l      D7
  19. 00000040  8FEC 0018                divs.w     D7, [A4 + 0x18]
  20. 00000044  CFEC 0018                muls.w     D7, [A4 + 0x18]
  21. 00000048  DE6D FA8E                add.w      D7, [A5 - 0x572]
  22. 0000004C  3B47 FA92                move.w     [A5 - 0x56E], D7
  23. 00000050  3E2D FA92                move.w     D7, [A5 - 0x56E]
  24. 00000054  9E6D FA8E                sub.w      D7, [A5 - 0x572]
  25. 00000058  48C7                     ext.l      D7
  26. 0000005A  8FEC 0018                divs.w     D7, [A4 + 0x18]
  27. 0000005E  3B47 F73E                move.w     [A5 - 0x8C2], D7
  28. 00000062  3E2D FA94                move.w     D7, [A5 - 0x56C]
  29. 00000066  9E6D FA90                sub.w      D7, [A5 - 0x570]
  30. 0000006A  3B47 F73C                move.w     [A5 - 0x8C4], D7
  31. 0000006E  4CDF 1080                movem.l    D7,A4, [A7]+
  32. 00000072  4E5E                     unlink     A6
  33. 00000074  4E75                     rts
  34. 00000076  8D43 414C                pack       D6, D3, 0x414C
  35. 0000007A  4350                     chk.w      D1, [A0]
  36. 0000007C  5249                     addq.w     A1, 1
  37. 0000007E  4E54 5041                link       A4, -0xFFFFAFBF
  38. 00000082  4745                     chk.w      D3, D5
  39. 00000084  0000 4E56                ori.b      D0, 0x56 /* 'V' */
  40. export_75: // at 00000086 (misaligned)
  41. 00000088  FFFE                     .invalid   <<F/7/7>>
  42. 0000008A  48E7 0100                movem.l    -[A7], D7
  43. 0000008E  A850                     syscall    InitCursor
  44. 00000090  2F3C C800 0000           move.l     -[A7], 0xC8000000
  45. 00000096  A8FD                     syscall    PrGlue
  46. 00000098  558F                     subq.l     A7, 2
  47. 0000009A  2F3C BA00 0000           move.l     -[A7], 0xBA000000
  48. 000000A0  A8FD                     syscall    PrGlue
  49. 000000A2  3E1F                     move.w     D7, [A7]+
  50. 000000A4  4A47                     tst.w      D7
  51. 000000A6  6600 0040                bne        +0x42 /* 000000E8 */
  52. 000000AA  558F                     subq.l     A7, 2
  53. 000000AC  2F2D F744                move.l     -[A7], [A5 - 0x8BC]
  54. 000000B0  2F3C 5204 0498           move.l     -[A7], 0x52040498
  55. 000000B6  A8FD                     syscall    PrGlue
  56. 000000B8  1D5F FFFE                move.b     [A6 - 0x2], [A7]+
  57. 000000BC  558F                     subq.l     A7, 2
  58. 000000BE  2F2D F744                move.l     -[A7], [A5 - 0x8BC]
  59. 000000C2  2F3C 2A04 0484           move.l     -[A7], 0x2A040484
  60. 000000C8  A8FD                     syscall    PrGlue
  61. 000000CA  1D5F FFFE                move.b     [A6 - 0x2], [A7]+
  62. 000000CE  4A2E FFFE                tst.b      [A6 - 0x2]
  63. 000000D2  6700 000C                beq        +0xE /* 000000E0 */
  64. 000000D6  1B7C 0001 FAB2           move.b     [A5 - 0x54E], 0x1
  65. 000000DC  6000 0006                bra        +0x8 /* 000000E4 */
  66. label000000E0:
  67. 000000E0  422D FAB2                clr.b      [A5 - 0x54E]
  68. label000000E4:
  69. 000000E4  6000 0008                bra        +0xA /* 000000EE */
  70. label000000E8:
  71. 000000E8  3F3C 0001                move.w     -[A7], 0x1
  72. 000000EC  A9C8                     syscall    SysBeep
  73. label000000EE:
  74. 000000EE  2F3C D000 0000           move.l     -[A7], 0xD0000000
  75. 000000F4  A8FD                     syscall    PrGlue
  76. 000000F6  4CDF 0080                movem.l    D7, [A7]+
  77. 000000FA  4E5E                     unlink     A6
  78. 000000FC  4E75                     rts
  79. 000000FE  8744 4F53                pack       D3, D4, 0x4F53
  80. 00000102  4554                     chk.w      D2, [A4]
  81. 00000104  5550                     subq.w     [A0], 2
  82. 00000106  0000 4E56                ori.b      D0, 0x56 /* 'V' */
  83. // begin alternate branch 00000108-0000010C
  84. fn00000108:
  85. 00000108  4E56 FFFA                link       A6, -0x0006
  86. // end alternate branch 00000108-0000010C
  87. fn00000108: // (misaligned)
  88. 0000010A  FFFA                     .invalid   <<F/7/7>>
  89. 0000010C  48E7 0318                movem.l    -[A7], D6,D7,A3,A4
  90. 00000110  2F2D FA8A                move.l     -[A7], [A5 - 0x576]
  91. 00000114  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  92. 00000118  286D FA8A                movea.l    A4, [A5 - 0x576]
  93. 0000011C  2854                     movea.l    A4, [A4]
  94. 0000011E  7EFF                     moveq.l    D7, 0xFFFFFFFF
  95. 00000120  2D47 FFFA                move.l     [A6 - 0x6], D7
  96. 00000124  426E FFFE                clr.w      [A6 - 0x2]
  97. label00000128:
  98. 00000128  526E FFFE                addq.w     [A6 - 0x2], 1
  99. 0000012C  52AE FFFA                addq.l     [A6 - 0x6], 1
  100. 00000130  598F                     subq.l     A7, 4
  101. 00000132  2F2C 003E                move.l     -[A7], [A4 + 0x3E]
  102. 00000136  2F2E FFFA                move.l     -[A7], [A6 - 0x6]
  103. 0000013A  47ED F98A                lea.l      A3, [A5 - 0x676]
  104. 0000013E  2E0B                     move.l     D7, A3
  105. 00000140  5287                     addq.l     D7, 1
  106. 00000142  2F07                     move.l     -[A7], D7
  107. 00000144  2F3C 0000 0001           move.l     -[A7], 0x1
  108. 0000014A  42A7                     clr.l      -[A7]
  109. 0000014C  2F3C 0000 0001           move.l     -[A7], 0x1
  110. 00000152  A9E0                     syscall    Munger
  111. 00000154  2D5F FFFA                move.l     [A6 - 0x6], [A7]+
  112. 00000158  3E2E FFFE                move.w     D7, [A6 - 0x2]
  113. 0000015C  5347                     subq.w     D7, 1
  114. 0000015E  E74F                     lsl        D7.w, 3
  115. 00000160  47ED F990                lea.l      A3, [A5 - 0x670]
  116. 00000164  558F                     subq.l     A7, 2
  117. 00000166  2F2E FFFA                move.l     -[A7], [A6 - 0x6]
  118. 0000016A  A86B                     syscall    LoWord
  119. 0000016C  379F 7006                move.w     [A3 + D7.w + 0x6], [A7]+
  120. 00000170  3E2E FFFE                move.w     D7, [A6 - 0x2]
  121. 00000174  BE6D FA80                cmp.w      D7, [A5 - 0x580]
  122. 00000178  66AE                     bne        -0x50 /* 00000128 */
  123. 0000017A  2F2D FA8A                move.l     -[A7], [A5 - 0x576]
  124. 0000017E  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  125. 00000182  4CDF 18C0                movem.l    D6,D7,A3,A4, [A7]+
  126. 00000186  4E5E                     unlink     A6
  127. 00000188  4E75                     rts
  128. 0000018A  8A43                     or.w       D5, D3
  129. 0000018C  414C                     chk.w      D0, A4
  130. 0000018E  4350                     chk.w      D1, [A0]
  131. 00000190  4943                     chk.w      D4, D3
  132. 00000192  4C4F 4300                movem.l    A0,A1,A6, A7
  133. 00000196  0000 4E56                ori.b      D0, 0x56 /* 'V' */
  134. export_76: // at 00000198 (misaligned)
  135. 0000019A  FE1E 48E7                .unknown   0xFE1E 0x48E7 (W = 7)
  136. 0000019E  1F38 1E2D                move.b     -[A7], [0x00001E2D]
  137. 000001A2  FAB2 0A07                .extension 0xAB2 <<F/2-3/5>> // unimplemented
  138. 000001A6  0001 6700                ori.b      D1, 0x0
  139. 000001AA  0006 4EBA                ori.b      D6, 0xBA
  140. 000001AE  FED8 2F3C                .extension 0xED8 <<F/2-3/7>> // unimplemented
  141. 000001B2  C800                     and.b      D4, D0
  142. 000001B4  0000 A8FD                ori.b      D0, 0xFD
  143. 000001B8  558F                     subq.l     A7, 2
  144. 000001BA  2F3C BA00 0000           move.l     -[A7], 0xBA000000
  145. 000001C0  A8FD                     syscall    PrGlue
  146. 000001C2  3E1F                     move.w     D7, [A7]+
  147. 000001C4  4A47                     tst.w      D7
  148. 000001C6  57C7                     seq        D7
  149. 000001C8  CE2D FAB2                and.b      D7, [A5 - 0x54E]
  150. 000001CC  6700 03F2                beq        +0x3F4 /* 000005C0 */
  151. 000001D0  558F                     subq.l     A7, 2
  152. 000001D2  2F2D F744                move.l     -[A7], [A5 - 0x8BC]
  153. 000001D6  2F3C 3204 0488           move.l     -[A7], 0x32040488
  154. 000001DC  A8FD                     syscall    PrGlue
  155. 000001DE  1E1F                     move.b     D7, [A7]+
  156. 000001E0  6700 03DE                beq        +0x3E0 /* 000005C0 */
  157. 000001E4  286D FA82                movea.l    A4, [A5 - 0x57E]
  158. 000001E8  2854                     movea.l    A4, [A4]
  159. 000001EA  2F0C                     move.l     -[A7], A4
  160. 000001EC  A851                     syscall    SetCursor
  161. 000001EE  486E FFF8                pea.l      [A6 - 0x8]
  162. 000001F2  A874                     syscall    GetPort
  163. 000001F4  598F                     subq.l     A7, 4
  164. 000001F6  3F3C 00C8                move.w     -[A7], 0xC8
  165. 000001FA  42A7                     clr.l      -[A7]
  166. 000001FC  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  167. 00000202  A97C                     syscall    GetNewDialog
  168. 00000204  2D5F FFF4                move.l     [A6 - 0xC], [A7]+
  169. 00000208  486E FFF4                pea.l      [A6 - 0xC]
  170. 0000020C  2F3C 0014 0001           move.l     -[A7], 0x140001
  171. 00000212  1F3C 0001                move.b     -[A7], 0x1
  172. 00000216  4EAD 020A                jsr        [A5 + 0x20A /* export_61 */]
  173. 0000021A  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  174. 0000021E  A873                     syscall    SetPort
  175. 00000220  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  176. 00000224  A981                     syscall    DrawDialog
  177. 00000226  4EBA FDD8                jsr        [PC - 0x228 /* 00000000 */]
  178. 0000022A  286D FA8A                movea.l    A4, [A5 - 0x576]
  179. 0000022E  2854                     movea.l    A4, [A4]
  180. 00000230  2D54 FE30                move.l     [A6 - 0x1D0], [A4]
  181. 00000234  2D6C 0004 FE34           move.l     [A6 - 0x1CC], [A4 + 0x4]
  182. 0000023A  286D FA8A                movea.l    A4, [A5 - 0x576]
  183. 0000023E  2854                     movea.l    A4, [A4]
  184. 00000240  28AD FA8E                move.l     [A4], [A5 - 0x572]
  185. 00000244  296D FA92 0004           move.l     [A4 + 0x4], [A5 - 0x56E]
  186. 0000024A  286D FA8A                movea.l    A4, [A5 - 0x576]
  187. 0000024E  2854                     movea.l    A4, [A4]
  188. 00000250  2D6C 0008 FE28           move.l     [A6 - 0x1D8], [A4 + 0x8]
  189. 00000256  2D6C 000C FE2C           move.l     [A6 - 0x1D4], [A4 + 0xC]
  190. 0000025C  286D FA8A                movea.l    A4, [A5 - 0x576]
  191. 00000260  2854                     movea.l    A4, [A4]
  192. 00000262  296D FA8E 0008           move.l     [A4 + 0x8], [A5 - 0x572]
  193. 00000268  296D FA92 000C           move.l     [A4 + 0xC], [A5 - 0x56E]
  194. 0000026E  2F2D FA8A                move.l     -[A7], [A5 - 0x576]
  195. 00000272  A9D0                     syscall    TECalText
  196. 00000274  4EAD 023A                jsr        [A5 + 0x23A /* export_67 */]
  197. 00000278  2F2D FA8A                move.l     -[A7], [A5 - 0x576]
  198. 0000027C  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  199. 00000280  286D FA8A                movea.l    A4, [A5 - 0x576]
  200. 00000284  2854                     movea.l    A4, [A4]
  201. 00000286  3E3C 0001                move.w     D7, 0x1
  202. 0000028A  3C2D F98C                move.w     D6, [A5 - 0x674]
  203. 0000028E  5346                     subq.w     D6, 1
  204. 00000290  3D46 FE20                move.w     [A6 - 0x1E0], D6
  205. 00000294  6000 0042                bra        +0x44 /* 000002D8 */
  206. label00000298:
  207. 00000298  3C07                     move.w     D6, D7
  208. 0000029A  DC46                     add.w      D6, D6
  209. 0000029C  47EE FF04                lea.l      A3, [A6 - 0xFC]
  210. 000002A0  3A07                     move.w     D5, D7
  211. 000002A2  5245                     addq.w     D5, 1
  212. 000002A4  5345                     subq.w     D5, 1
  213. 000002A6  CBFC 0006                muls.w     D5, 0x6
  214. 000002AA  45ED F5F4                lea.l      A2, [A5 - 0xA0C]
  215. 000002AE  3832 5000                move.w     D4, [A2 + D5.w]
  216. 000002B2  D844                     add.w      D4, D4
  217. 000002B4  3A07                     move.w     D5, D7
  218. 000002B6  5345                     subq.w     D5, 1
  219. 000002B8  CBFC 0006                muls.w     D5, 0x6
  220. 000002BC  45ED F5F4                lea.l      A2, [A5 - 0xA0C]
  221. 000002C0  3632 5000                move.w     D3, [A2 + D5.w]
  222. 000002C4  D643                     add.w      D3, D3
  223. 000002C6  3A34 4060                move.w     D5, [A4 + D4.w + 0x60]
  224. 000002CA  9A74 3060                sub.w      D5, [A4 + D3.w + 0x60]
  225. 000002CE  3785 6000                move.w     [A3 + D6.w], D5
  226. 000002D2  5247                     addq.w     D7, 1
  227. 000002D4  6900 0008                bvs        +0xA /* 000002DE */
  228. label000002D8:
  229. 000002D8  BE6E FE20                cmp.w      D7, [A6 - 0x1E0]
  230. 000002DC  6FBA                     ble        -0x44 /* 00000298 */
  231. label000002DE:
  232. 000002DE  3D47 FFD0                move.w     [A6 - 0x30], D7
  233. 000002E2  3E2D F98C                move.w     D7, [A5 - 0x674]
  234. 000002E6  DE47                     add.w      D7, D7
  235. 000002E8  47EE FF04                lea.l      A3, [A6 - 0xFC]
  236. 000002EC  3C2D F98C                move.w     D6, [A5 - 0x674]
  237. 000002F0  5346                     subq.w     D6, 1
  238. 000002F2  CDFC 0006                muls.w     D6, 0x6
  239. 000002F6  45ED F5F4                lea.l      A2, [A5 - 0xA0C]
  240. 000002FA  3A32 6000                move.w     D5, [A2 + D6.w]
  241. 000002FE  DA45                     add.w      D5, D5
  242. 00000300  3C2C 003C                move.w     D6, [A4 + 0x3C]
  243. 00000304  9C74 5060                sub.w      D6, [A4 + D5.w + 0x60]
  244. 00000308  3786 7000                move.w     [A3 + D7.w], D6
  245. 0000030C  4EAD 024A                jsr        [A5 + 0x24A /* export_69 */]
  246. 00000310  4EBA FDF6                jsr        [PC - 0x20A /* 00000108 */]
  247. 00000314  3D7C FFFF FFCE           move.w     [A6 - 0x32], 0xFFFF
  248. 0000031A  286D FA8A                movea.l    A4, [A5 - 0x576]
  249. 0000031E  2854                     movea.l    A4, [A4]
  250. 00000320  3E3C 0001                move.w     D7, 0x1
  251. 00000324  3D6D FA80 FE20           move.w     [A6 - 0x1E0], [A5 - 0x580]
  252. 0000032A  6000 00C2                bra        +0xC4 /* 000003EE */
  253. label0000032E:
  254. 0000032E  526E FFCE                addq.w     [A6 - 0x32], 1
  255. 00000332  3C2E FFCE                move.w     D6, [A6 - 0x32]
  256. 00000336  DC46                     add.w      D6, D6
  257. 00000338  3A07                     move.w     D5, D7
  258. 0000033A  5345                     subq.w     D5, 1
  259. 0000033C  E74D                     lsl        D5.w, 3
  260. 0000033E  47ED F990                lea.l      A3, [A5 - 0x670]
  261. 00000342  3834 6060                move.w     D4, [A4 + D6.w + 0x60]
  262. 00000346  B873 5006                cmp.w      D4, [A3 + D5.w + 0x6]
  263. 0000034A  6DE2                     blt        -0x1C /* 0000032E */
  264. 0000034C  426E FFD0                clr.w      [A6 - 0x30]
  265. label00000350:
  266. 00000350  526E FFD0                addq.w     [A6 - 0x30], 1
  267. 00000354  3C2E FFD0                move.w     D6, [A6 - 0x30]
  268. 00000358  5346                     subq.w     D6, 1
  269. 0000035A  CDFC 0006                muls.w     D6, 0x6
  270. 0000035E  47ED F5F4                lea.l      A3, [A5 - 0xA0C]
  271. 00000362  3A2E FFCE                move.w     D5, [A6 - 0x32]
  272. 00000366  BA73 6002                cmp.w      D5, [A3 + D6.w + 0x2]
  273. 0000036A  6EE4                     bgt        -0x1A /* 00000350 */
  274. 0000036C  3C07                     move.w     D6, D7
  275. 0000036E  5346                     subq.w     D6, 1
  276. 00000370  CDFC 000A                muls.w     D6, 0xA /* '\n' */
  277. 00000374  47EE FE38                lea.l      A3, [A6 - 0x1C8]
  278. 00000378  37AE FFD0 6000           move.w     [A3 + D6.w], [A6 - 0x30]
  279. 0000037E  3C2E FFD0                move.w     D6, [A6 - 0x30]
  280. 00000382  5346                     subq.w     D6, 1
  281. 00000384  CDFC 0006                muls.w     D6, 0x6
  282. 00000388  47ED F5F4                lea.l      A3, [A5 - 0xA0C]
  283. 0000038C  3D73 6000 FFCC           move.w     [A6 - 0x34], [A3 + D6.w]
  284. 00000392  3C07                     move.w     D6, D7
  285. 00000394  5346                     subq.w     D6, 1
  286. 00000396  CDFC 000A                muls.w     D6, 0xA /* '\n' */
  287. 0000039A  47EE FE38                lea.l      A3, [A6 - 0x1C8]
  288. 0000039E  3A2E FFCE                move.w     D5, [A6 - 0x32]
  289. 000003A2  9A6E FFCC                sub.w      D5, [A6 - 0x34]
  290. 000003A6  CBEC 0018                muls.w     D5, [A4 + 0x18]
  291. 000003AA  DA6D FA8E                add.w      D5, [A5 - 0x572]
  292. 000003AE  3785 6002                move.w     [A3 + D6.w + 0x2], D5
  293. 000003B2  3A07                     move.w     D5, D7
  294. 000003B4  5345                     subq.w     D5, 1
  295. 000003B6  E74D                     lsl        D5.w, 3
  296. 000003B8  45ED F990                lea.l      A2, [A5 - 0x670]
  297. 000003BC  37B2 5000 6004           move.w     [A3 + D6.w + 0x4], [A2 + D5.w]
  298. 000003C2  3A07                     move.w     D5, D7
  299. 000003C4  5345                     subq.w     D5, 1
  300. 000003C6  E74D                     lsl        D5.w, 3
  301. 000003C8  45ED F990                lea.l      A2, [A5 - 0x670]
  302. 000003CC  37B2 5002 6008           move.w     [A3 + D6.w + 0x8], [A2 + D5.w + 0x2]
  303. 000003D2  3A07                     move.w     D5, D7
  304. 000003D4  5345                     subq.w     D5, 1
  305. 000003D6  E74D                     lsl        D5.w, 3
  306. 000003D8  45ED F990                lea.l      A2, [A5 - 0x670]
  307. 000003DC  3833 6002                move.w     D4, [A3 + D6.w + 0x2]
  308. 000003E0  D872 5004                add.w      D4, [A2 + D5.w + 0x4]
  309. 000003E4  3784 6006                move.w     [A3 + D6.w + 0x6], D4
  310. 000003E8  5247                     addq.w     D7, 1
  311. 000003EA  6900 000A                bvs        +0xC /* 000003F6 */
  312. label000003EE:
  313. 000003EE  BE6E FE20                cmp.w      D7, [A6 - 0x1E0]
  314. 000003F2  6F00 FF3A                ble        -0xC4 /* 0000032E */
  315. label000003F6:
  316. 000003F6  3D47 FFD4                move.w     [A6 - 0x2C], D7
  317. 000003FA  286D FA8A                movea.l    A4, [A5 - 0x576]
  318. 000003FE  2854                     movea.l    A4, [A4]
  319. 00000400  2F2C 003E                move.l     -[A7], [A4 + 0x3E]
  320. 00000404  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  321. 00000408  286D FA8A                movea.l    A4, [A5 - 0x576]
  322. 0000040C  2854                     movea.l    A4, [A4]
  323. 0000040E  286C 003E                movea.l    A4, [A4 + 0x3E]
  324. 00000412  2D54 FE24                move.l     [A6 - 0x1DC], [A4]
  325. 00000416  598F                     subq.l     A7, 4
  326. 00000418  2F2D F744                move.l     -[A7], [A5 - 0x8BC]
  327. 0000041C  42A7                     clr.l      -[A7]
  328. 0000041E  42A7                     clr.l      -[A7]
  329. 00000420  2F3C 0400 0C00           move.l     -[A7], 0x4000C00
  330. 00000426  A8FD                     syscall    PrGlue
  331. 00000428  2D5F FFFC                move.l     [A6 - 0x4], [A7]+
  332. 0000042C  3F2D F740                move.w     -[A7], [A5 - 0x8C0]
  333. 00000430  A887                     syscall    TextFont
  334. 00000432  3F2D F742                move.w     -[A7], [A5 - 0x8BE]
  335. 00000436  A88A                     syscall    TextSize
  336. 00000438  3E3C 0001                move.w     D7, 0x1
  337. 0000043C  3D6D F98C FE20           move.w     [A6 - 0x1E0], [A5 - 0x674]
  338. 00000442  6000 00D4                bra        +0xD6 /* 00000518 */
  339. label00000446:
  340. 00000446  558F                     subq.l     A7, 2
  341. 00000448  2F3C BA00 0000           move.l     -[A7], 0xBA000000
  342. 0000044E  A8FD                     syscall    PrGlue
  343. 00000450  3C1F                     move.w     D6, [A7]+
  344. 00000452  4A46                     tst.w      D6
  345. 00000454  6600 00BC                bne        +0xBE /* 00000512 */
  346. 00000458  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  347. 0000045C  42A7                     clr.l      -[A7]
  348. 0000045E  2F3C 1000 0808           move.l     -[A7], 0x10000808
  349. 00000464  A8FD                     syscall    PrGlue
  350. 00000466  558F                     subq.l     A7, 2
  351. 00000468  2F3C BA00 0000           move.l     -[A7], 0xBA000000
  352. 0000046E  A8FD                     syscall    PrGlue
  353. 00000470  3C1F                     move.w     D6, [A7]+
  354. 00000472  4A46                     tst.w      D6
  355. 00000474  6600 0090                bne        +0x92 /* 00000506 */
  356. 00000478  2F2E FE24                move.l     -[A7], [A6 - 0x1DC]
  357. 0000047C  3C07                     move.w     D6, D7
  358. 0000047E  DC46                     add.w      D6, D6
  359. 00000480  49EE FF04                lea.l      A4, [A6 - 0xFC]
  360. 00000484  3A34 6000                move.w     D5, [A4 + D6.w]
  361. 00000488  48C5                     ext.l      D5
  362. 0000048A  2F05                     move.l     -[A7], D5
  363. 0000048C  486D FA8E                pea.l      [A5 - 0x572]
  364. 00000490  4267                     clr.w      -[A7]
  365. 00000492  A9CE                     syscall    TETextBox/TextBox
  366. 00000494  3C07                     move.w     D6, D7
  367. 00000496  DC46                     add.w      D6, D6
  368. 00000498  49EE FF04                lea.l      A4, [A6 - 0xFC]
  369. 0000049C  3A34 6000                move.w     D5, [A4 + D6.w]
  370. 000004A0  48C5                     ext.l      D5
  371. 000004A2  DAAE FE24                add.l      D5, [A6 - 0x1DC]
  372. 000004A6  2D45 FE24                move.l     [A6 - 0x1DC], D5
  373. 000004AA  4A6D FA80                tst.w      [A5 - 0x580]
  374. 000004AE  6700 0056                beq        +0x58 /* 00000506 */
  375. 000004B2  3C3C 0001                move.w     D6, 0x1
  376. 000004B6  3D6D FA80 FE1E           move.w     [A6 - 0x1E2], [A5 - 0x580]
  377. 000004BC  6000 003E                bra        +0x40 /* 000004FC */
  378. label000004C0:
  379. 000004C0  3A06                     move.w     D5, D6
  380. 000004C2  5345                     subq.w     D5, 1
  381. 000004C4  CBFC 000A                muls.w     D5, 0xA /* '\n' */
  382. 000004C8  49EE FE38                lea.l      A4, [A6 - 0x1C8]
  383. 000004CC  3834 5000                move.w     D4, [A4 + D5.w]
  384. 000004D0  B847                     cmp.w      D4, D7
  385. 000004D2  6600 0022                bne        +0x24 /* 000004F6 */
  386. 000004D6  3A06                     move.w     D5, D6
  387. 000004D8  5345                     subq.w     D5, 1
  388. 000004DA  E54D                     lsl        D5.w, 2
  389. 000004DC  49ED FA30                lea.l      A4, [A5 - 0x5D0]
  390. 000004E0  2F34 5000                move.l     -[A7], [A4 + D5.w]
  391. 000004E4  3A06                     move.w     D5, D6
  392. 000004E6  5345                     subq.w     D5, 1
  393. 000004E8  CBFC 000A                muls.w     D5, 0xA /* '\n' */
  394. 000004EC  49EE FE38                lea.l      A4, [A6 - 0x1C8]
  395. 000004F0  4874 5002                pea.l      [A4 + D5.w + 0x2]
  396. 000004F4  A8F6                     syscall    DrawPicture
  397. label000004F6:
  398. 000004F6  5246                     addq.w     D6, 1
  399. 000004F8  6900 0008                bvs        +0xA /* 00000502 */
  400. label000004FC:
  401. 000004FC  BC6E FE1E                cmp.w      D6, [A6 - 0x1E2]
  402. 00000500  6FBE                     ble        -0x40 /* 000004C0 */
  403. label00000502:
  404. 00000502  3D46 FFD0                move.w     [A6 - 0x30], D6
  405. label00000506:
  406. 00000506  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  407. 0000050A  2F3C 1800 040C           move.l     -[A7], 0x1800040C
  408. 00000510  A8FD                     syscall    PrGlue
  409. label00000512:
  410. 00000512  5247                     addq.w     D7, 1
  411. 00000514  6900 000A                bvs        +0xC /* 00000520 */
  412. label00000518:
  413. 00000518  BE6E FE20                cmp.w      D7, [A6 - 0x1E0]
  414. 0000051C  6F00 FF28                ble        -0xD6 /* 00000446 */
  415. label00000520:
  416. 00000520  3D47 FFD8                move.w     [A6 - 0x28], D7
  417. 00000524  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  418. 00000528  2F3C 0800 0484           move.l     -[A7], 0x8000484
  419. 0000052E  A8FD                     syscall    PrGlue
  420. 00000530  286D FA8A                movea.l    A4, [A5 - 0x576]
  421. 00000534  2854                     movea.l    A4, [A4]
  422. 00000536  2F2C 003E                move.l     -[A7], [A4 + 0x3E]
  423. 0000053A  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  424. 0000053E  2F2D FA8A                move.l     -[A7], [A5 - 0x576]
  425. 00000542  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  426. 00000546  286D F744                movea.l    A4, [A5 - 0x8BC]
  427. 0000054A  2854                     movea.l    A4, [A4]
  428. 0000054C  1E2C 0044                move.b     D7, [A4 + 0x44]
  429. 00000550  4887                     ext.w      D7
  430. 00000552  0C47 0001                cmpi.w     D7, 0x1
  431. 00000556  57C7                     seq        D7
  432. 00000558  558F                     subq.l     A7, 2
  433. 0000055A  2F3C BA00 0000           move.l     -[A7], 0xBA000000
  434. 00000560  A8FD                     syscall    PrGlue
  435. 00000562  3C1F                     move.w     D6, [A7]+
  436. 00000564  4A46                     tst.w      D6
  437. 00000566  57C6                     seq        D6
  438. 00000568  CC07                     and.b      D6, D7
  439. 0000056A  6700 0018                beq        +0x1A /* 00000584 */
  440. 0000056E  2F2D F744                move.l     -[A7], [A5 - 0x8BC]
  441. 00000572  42A7                     clr.l      -[A7]
  442. 00000574  42A7                     clr.l      -[A7]
  443. 00000576  42A7                     clr.l      -[A7]
  444. 00000578  486E FFDA                pea.l      [A6 - 0x26]
  445. 0000057C  2F3C 6005 1480           move.l     -[A7], 0x60051480
  446. 00000582  A8FD                     syscall    PrGlue
  447. label00000584:
  448. 00000584  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  449. 00000588  A983                     syscall    DisposeDialog
  450. 0000058A  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  451. 0000058E  A873                     syscall    SetPort
  452. 00000590  286D FA8A                movea.l    A4, [A5 - 0x576]
  453. 00000594  2854                     movea.l    A4, [A4]
  454. 00000596  28AE FE30                move.l     [A4], [A6 - 0x1D0]
  455. 0000059A  296E FE34 0004           move.l     [A4 + 0x4], [A6 - 0x1CC]
  456. 000005A0  286D FA8A                movea.l    A4, [A5 - 0x576]
  457. 000005A4  2854                     movea.l    A4, [A4]
  458. 000005A6  296E FE28 0008           move.l     [A4 + 0x8], [A6 - 0x1D8]
  459. 000005AC  296E FE2C 000C           move.l     [A4 + 0xC], [A6 - 0x1D4]
  460. 000005B2  A896                     syscall    HidePen
  461. 000005B4  4EAD 0262                jsr        [A5 + 0x262 /* export_72 */]
  462. 000005B8  A897                     syscall    ShowPen
  463. 000005BA  4EAD 025A                jsr        [A5 + 0x25A /* export_71 */]
  464. 000005BE  A850                     syscall    InitCursor
  465. label000005C0:
  466. 000005C0  2F3C D000 0000           move.l     -[A7], 0xD0000000
  467. 000005C6  A8FD                     syscall    PrGlue
  468. 000005C8  4CDF 1CF8                movem.l    D3,D4,D5,D6,D7,A2,A3,A4, [A7]+
  469. 000005CC  4E5E                     unlink     A6
  470. 000005CE  4E75                     rts
  471. 000005D0  8744 4F50                pack       D3, D4, 0x4F50
  472. 000005D4  5249                     addq.w     A1, 1
  473. 000005D6  4E54 0000                link       A4, 0
  474.